/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / utils / finder.elc.z / finder.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar  9 12|
|00000040| 3a 35 35 3a 34 38 20 31 | 39 39 38 0a 3b 3b 3b 20 |:55:48 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 75 74 69 6c |s-20.3/l|isp/util|
|000000a0| 73 2f 66 69 6e 64 65 72 | 2e 65 6c 0a 3b 3b 3b 20 |s/finder|.el.;;; |
|000000b0| 65 6d 61 63 73 20 76 65 | 72 73 69 6f 6e 20 32 30 |emacs ve|rsion 20|
|000000c0| 2e 34 20 22 45 6d 65 72 | 61 6c 64 22 20 58 45 6d |.4 "Emer|ald" XEm|
|000000d0| 61 63 73 20 20 4c 75 63 | 69 64 2e 0a 3b 3b 3b 20 |acs  Luc|id..;;; |
|000000e0| 62 79 74 65 63 6f 6d 70 | 20 76 65 72 73 69 6f 6e |bytecomp| version|
|000000f0| 20 32 2e 32 35 20 58 45 | 6d 61 63 73 3b 20 32 32 | 2.25 XE|macs; 22|
|00000100| 2d 4d 61 72 2d 39 36 2e | 0a 3b 3b 3b 20 6f 70 74 |-Mar-96.|.;;; opt|
|00000110| 69 6d 69 7a 61 74 69 6f | 6e 20 69 73 20 6f 6e 2e |imizatio|n is on.|
|00000120| 0a 3b 3b 3b 20 74 68 69 | 73 20 66 69 6c 65 20 75 |.;;; thi|s file u|
|00000130| 73 65 73 20 6f 70 63 6f | 64 65 73 20 77 68 69 63 |ses opco|des whic|
|00000140| 68 20 64 6f 20 6e 6f 74 | 20 65 78 69 73 74 20 69 |h do not| exist i|
|00000150| 6e 20 45 6d 61 63 73 20 | 31 39 2e 0a 0a 28 69 66 |n Emacs |19...(if|
|00000160| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000170| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 29 0a 09 20 |macs-ver|sion).. |
|00000180| 28 6f 72 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(or (and| (boundp|
|00000190| 20 27 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e | 'epoch:|:version|
|000001a0| 29 20 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e |) epoch:|:version|
|000001b0| 29 0a 09 20 20 20 20 20 | 28 73 74 72 69 6e 67 2d |)..     |(string-|
|000001c0| 6c 65 73 73 70 20 65 6d | 61 63 73 2d 76 65 72 73 |lessp em|acs-vers|
|000001d0| 69 6f 6e 20 22 32 30 22 | 29 29 29 0a 20 20 20 20 |ion "20"|))).    |
|000001e0| 28 65 72 72 6f 72 20 22 | 60 66 69 6e 64 65 72 2e |(error "|`finder.|
|000001f0| 65 6c 27 20 77 61 73 20 | 63 6f 6d 70 69 6c 65 64 |el' was |compiled|
|00000200| 20 66 6f 72 20 45 6d 61 | 63 73 20 32 30 22 29 29 | for Ema|cs 20"))|
|00000210| 0a 0a 28 6f 72 20 28 62 | 6f 75 6e 64 70 20 27 63 |..(or (b|oundp 'c|
|00000220| 75 72 72 65 6e 74 2d 6c | 6f 61 64 2d 6c 69 73 74 |urrent-l|oad-list|
|00000230| 29 20 28 73 65 74 71 20 | 63 75 72 72 65 6e 74 2d |) (setq |current-|
|00000240| 6c 6f 61 64 2d 6c 69 73 | 74 20 6e 69 6c 29 29 0a |load-lis|t nil)).|
|00000250| 0a 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |..(byte-|code "..|
|00000260| 21 88 c2 c3 c4 8f 88 c0 | c5 21 88 c0 c6 21 87 22 |!.......|.!...!."|
|00000270| 20 5b 72 65 71 75 69 72 | 65 20 6c 69 73 70 2d 6d | [requir|e lisp-m|
|00000280| 6e 74 20 6e 69 6c 20 28 | 62 79 74 65 2d 63 6f 64 |nt nil (|byte-cod|
|00000290| 65 20 22 c0 c1 21 87 22 | 20 5b 72 65 71 75 69 72 |e "..!."| [requir|
|000002a0| 65 20 66 69 6e 64 65 72 | 2d 69 6e 66 5d 20 32 29 |e finder|-inf] 2)|
|000002b0| 20 28 28 74 29 29 20 70 | 69 63 74 75 72 65 20 6d | ((t)) p|icture m|
|000002c0| 6f 64 65 2d 6d 6f 74 69 | 6f 6e 5d 20 33 29 0a 23 |ode-moti|on] 3).#|
|000002d0| 40 33 39 20 52 6f 6f 74 | 20 64 69 72 65 63 74 6f |@39 Root| directo|
|000002e0| 72 79 20 6f 66 20 63 75 | 72 72 65 6e 74 20 65 6d |ry of cu|rrent em|
|000002f0| 61 63 73 20 74 72 65 65 | 2e 1f 0a 28 64 65 66 76 |acs tree|...(defv|
|00000300| 61 72 20 66 69 6e 64 65 | 72 2d 65 6d 61 63 73 2d |ar finde|r-emacs-|
|00000310| 72 6f 6f 74 2d 64 69 72 | 65 63 74 6f 72 79 20 28 |root-dir|ectory (|
|00000320| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 5c 6e 21 |byte-cod|e "..\n!|
|00000330| 21 87 22 20 5b 66 69 6c | 65 2d 6e 61 6d 65 2d 64 |!." [fil|e-name-d|
|00000340| 69 72 65 63 74 6f 72 79 | 20 64 69 72 65 63 74 6f |irectory| directo|
|00000350| 72 79 2d 66 69 6c 65 2d | 6e 61 6d 65 20 64 61 74 |ry-file-|name dat|
|00000360| 61 2d 64 69 72 65 63 74 | 6f 72 79 5d 20 33 29 20 |a-direct|ory] 3) |
|00000370| 28 23 24 20 2e 20 37 32 | 34 29 29 0a 23 40 32 31 |(#$ . 72|4)).#@21|
|00000380| 39 20 2a 4c 69 73 74 20 | 6f 66 20 64 69 72 65 63 |9 *List |of direc|
|00000390| 74 6f 72 79 20 72 6f 6f | 74 73 20 74 6f 20 72 65 |tory roo|ts to re|
|000003a0| 6d 6f 76 65 20 66 72 6f | 6d 20 66 69 6e 64 65 72 |move fro|m finder|
|000003b0| 2d 70 61 63 6b 61 67 65 | 2d 69 6e 66 6f 20 64 69 |-package|-info di|
|000003c0| 72 65 63 74 6f 72 79 20 | 65 6e 74 72 69 65 73 2e |rectory |entries.|
|000003d0| 0a 54 68 65 20 66 69 72 | 73 74 20 65 6c 65 6d 65 |.The fir|st eleme|
|000003e0| 6e 74 20 69 6e 20 74 68 | 65 20 6c 69 73 74 20 69 |nt in th|e list i|
|000003f0| 73 20 75 73 65 64 20 77 | 68 65 6e 20 65 78 70 61 |s used w|hen expa|
|00000400| 6e 64 69 6e 67 20 72 65 | 6c 61 74 69 76 65 20 70 |nding re|lative p|
|00000410| 61 63 6b 61 67 65 0a 64 | 69 72 65 63 74 6f 72 69 |ackage.d|irectori|
|00000420| 65 73 20 74 6f 20 76 69 | 65 77 20 6f 72 20 65 78 |es to vi|ew or ex|
|00000430| 74 72 61 63 74 20 69 6e | 66 6f 72 6d 61 74 69 6f |tract in|formatio|
|00000440| 6e 20 66 72 6f 6d 20 70 | 61 63 6b 61 67 65 20 73 |n from p|ackage s|
|00000450| 6f 75 72 63 65 20 63 6f | 64 65 2e 1f 0a 28 64 65 |ource co|de...(de|
|00000460| 66 76 61 72 20 66 69 6e | 64 65 72 2d 61 62 62 72 |fvar fin|der-abbr|
|00000470| 65 76 69 61 74 65 2d 64 | 69 72 65 63 74 6f 72 79 |eviate-d|irectory|
|00000480| 2d 6c 69 73 74 20 28 6c | 69 73 74 20 66 69 6e 64 |-list (l|ist find|
|00000490| 65 72 2d 65 6d 61 63 73 | 2d 72 6f 6f 74 2d 64 69 |er-emacs|-root-di|
|000004a0| 72 65 63 74 6f 72 79 29 | 20 28 23 24 20 2e 20 2d |rectory)| (#$ . -|
|000004b0| 38 39 38 29 29 0a 23 40 | 36 39 20 52 65 67 65 78 |898)).#@|69 Regex|
|000004c0| 70 20 77 68 69 63 68 20 | 6d 61 74 63 68 65 73 20 |p which |matches |
|000004d0| 66 69 6c 65 20 6e 61 6d | 65 73 20 62 75 74 20 6e |file nam|es but n|
|000004e0| 6f 74 20 45 6d 61 63 73 | 20 4c 69 73 70 20 66 69 |ot Emacs| Lisp fi|
|000004f0| 6e 64 65 72 20 6b 65 79 | 77 6f 72 64 73 2e 1f 0a |nder key|words...|
|00000500| 28 64 65 66 76 61 72 20 | 66 69 6e 64 65 72 2d 66 |(defvar |finder-f|
|00000510| 69 6c 65 2d 72 65 67 65 | 78 70 20 22 5c 5c 2e 65 |ile-rege|xp "\\.e|
|00000520| 6c 24 22 20 28 23 24 20 | 2e 20 31 32 31 31 29 29 |l$" (#$ |. 1211))|
|00000530| 0a 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 09 42 |.(byte-c|ode "..B|
|00000540| 11 c2 c3 21 ac bb c4 c5 | c6 c7 c8 c9 ca cb cc cd |...!....|........|
|00000550| ce cf d0 d1 d2 d3 d4 d5 | d6 d7 d8 d9 da db dc dd |........|........|
|00000560| 21 ad 83 dd de 42 df 42 | 42 42 42 42 42 42 42 42 |!....B.B|BBBBBBBB|
|00000570| 42 42 42 42 42 42 42 42 | 42 42 42 42 42 42 42 42 |BBBBBBBB|BBBBBBBB|
|00000580| 13 c3 09 42 11 c2 e0 21 | ac 83 e1 16 20 e0 09 42 |...B...!|.... ..B|
|00000590| 11 0e 20 ac c8 e2 20 1e | 23 e4 0e 23 e5 e6 23 88 |.. ... .|#..#..#.|
|000005a0| e4 0e 23 e7 e6 23 88 e4 | 0e 23 e8 e6 23 88 e4 0e |..#..#..|.#..#...|
|000005b0| 23 e9 ea 23 88 e4 0e 23 | eb ec 23 88 e4 0e 23 ed |#..#...#|..#...#.|
|000005c0| ee 23 88 e4 0e 23 ef f0 | 23 88 e4 0e 23 f1 f2 23 |.#...#..|#...#..#|
|000005d0| 88 e4 0e 23 f3 f4 23 88 | 0e 23 16 20 29 e1 87 22 |...#..#.|.#. ).."|
|000005e0| 20 5b 66 69 6e 64 65 72 | 2d 68 65 61 64 6d 61 72 | [finder|-headmar|
|000005f0| 6b 20 63 75 72 72 65 6e | 74 2d 6c 6f 61 64 2d 6c |k curren|t-load-l|
|00000600| 69 73 74 20 62 6f 75 6e | 64 70 20 66 69 6e 64 65 |ist boun|dp finde|
|00000610| 72 2d 6b 6e 6f 77 6e 2d | 6b 65 79 77 6f 72 64 73 |r-known-|keywords|
|00000620| 20 28 61 62 62 72 65 76 | 20 2e 20 22 61 62 62 72 | (abbrev| . "abbr|
|00000630| 65 76 69 61 74 69 6f 6e | 20 68 61 6e 64 6c 69 6e |eviation| handlin|
|00000640| 67 2c 20 74 79 70 69 6e | 67 20 73 68 6f 72 74 63 |g, typin|g shortc|
|00000650| 75 74 73 2c 20 6d 61 63 | 72 6f 73 22 29 20 28 62 |uts, mac|ros") (b|
|00000660| 69 62 20 2e 20 22 63 6f | 64 65 20 72 65 6c 61 74 |ib . "co|de relat|
|00000670| 65 64 20 74 6f 20 74 68 | 65 20 60 62 69 62 27 20 |ed to th|e `bib' |
|00000680| 62 69 62 6c 69 6f 67 72 | 61 70 68 79 20 70 72 6f |bibliogr|aphy pro|
|00000690| 63 65 73 73 6f 72 22 29 | 20 28 63 20 2e 20 22 43 |cessor")| (c . "C|
|000006a0| 2c 20 43 2b 2b 2c 20 61 | 6e 64 20 4f 62 6a 65 63 |, C++, a|nd Objec|
|000006b0| 74 69 76 65 2d 43 20 6c | 61 6e 67 75 61 67 65 20 |tive-C l|anguage |
|000006c0| 73 75 70 70 6f 72 74 22 | 29 20 28 63 61 6c 65 6e |support"|) (calen|
|000006d0| 64 61 72 20 2e 20 22 63 | 61 6c 65 6e 64 61 72 20 |dar . "c|alendar |
|000006e0| 61 6e 64 20 74 69 6d 65 | 20 6d 61 6e 61 67 65 6d |and time| managem|
|000006f0| 65 6e 74 20 73 75 70 70 | 6f 72 74 22 29 20 28 63 |ent supp|ort") (c|
|00000700| 6f 6d 6d 20 2e 20 22 63 | 6f 6d 6d 75 6e 69 63 61 |omm . "c|ommunica|
|00000710| 74 69 6f 6e 73 2c 20 6e | 65 74 77 6f 72 6b 69 6e |tions, n|etworkin|
|00000720| 67 2c 20 72 65 6d 6f 74 | 65 20 61 63 63 65 73 73 |g, remot|e access|
|00000730| 20 74 6f 20 66 69 6c 65 | 73 22 29 20 28 64 61 74 | to file|s") (dat|
|00000740| 61 20 2e 20 22 73 75 70 | 70 6f 72 74 20 66 6f 72 |a . "sup|port for|
|00000750| 20 65 64 69 74 69 6e 67 | 20 66 69 6c 65 73 20 6f | editing| files o|
|00000760| 66 20 64 61 74 61 22 29 | 20 28 64 6f 63 73 20 2e |f data")| (docs .|
|00000770| 20 22 73 75 70 70 6f 72 | 74 20 66 6f 72 20 45 6d | "suppor|t for Em|
|00000780| 61 63 73 20 64 6f 63 75 | 6d 65 6e 74 61 74 69 6f |acs docu|mentatio|
|00000790| 6e 22 29 20 28 65 6d 75 | 6c 61 74 69 6f 6e 73 20 |n") (emu|lations |
|000007a0| 2e 20 22 65 6d 75 6c 61 | 74 69 6f 6e 73 20 6f 66 |. "emula|tions of|
|000007b0| 20 6f 74 68 65 72 20 65 | 64 69 74 6f 72 73 22 29 | other e|ditors")|
|000007c0| 20 28 65 78 74 65 6e 73 | 69 6f 6e 73 20 2e 20 22 | (extens|ions . "|
|000007d0| 45 6d 61 63 73 20 4c 69 | 73 70 20 6c 61 6e 67 75 |Emacs Li|sp langu|
|000007e0| 61 67 65 20 65 78 74 65 | 6e 73 69 6f 6e 73 22 29 |age exte|nsions")|
|000007f0| 20 28 66 61 63 65 73 20 | 2e 20 22 73 75 70 70 6f | (faces |. "suppo|
|00000800| 72 74 20 66 6f 72 20 6d | 75 6c 74 69 70 6c 65 20 |rt for m|ultiple |
|00000810| 66 6f 6e 74 73 22 29 20 | 28 66 72 61 6d 65 73 20 |fonts") |(frames |
|00000820| 2e 20 22 73 75 70 70 6f | 72 74 20 66 6f 72 20 45 |. "suppo|rt for E|
|00000830| 6d 61 63 73 20 66 72 61 | 6d 65 73 20 61 6e 64 20 |macs fra|mes and |
|00000840| 77 69 6e 64 6f 77 20 73 | 79 73 74 65 6d 73 22 29 |window s|ystems")|
|00000850| 20 28 67 61 6d 65 73 20 | 2e 20 22 67 61 6d 65 73 | (games |. "games|
|00000860| 2c 20 6a 6f 6b 65 73 20 | 61 6e 64 20 61 6d 75 73 |, jokes |and amus|
|00000870| 65 6d 65 6e 74 73 22 29 | 20 28 68 61 72 64 77 61 |ements")| (hardwa|
|00000880| 72 65 20 2e 20 22 73 75 | 70 70 6f 72 74 20 66 6f |re . "su|pport fo|
|00000890| 72 20 69 6e 74 65 72 66 | 61 63 69 6e 67 20 77 69 |r interf|acing wi|
|000008a0| 74 68 20 65 78 6f 74 69 | 63 20 68 61 72 64 77 61 |th exoti|c hardwa|
|000008b0| 72 65 22 29 20 28 68 65 | 6c 70 20 2e 20 22 73 75 |re") (he|lp . "su|
|000008c0| 70 70 6f 72 74 20 66 6f | 72 20 6f 6e 2d 6c 69 6e |pport fo|r on-lin|
|000008d0| 65 20 68 65 6c 70 20 73 | 79 73 74 65 6d 73 22 29 |e help s|ystems")|
|000008e0| 20 28 68 79 70 65 72 6d | 65 64 69 61 20 2e 20 22 | (hyperm|edia . "|
|000008f0| 73 75 70 70 6f 72 74 20 | 66 6f 72 20 6c 69 6e 6b |support |for link|
|00000900| 73 20 62 65 74 77 65 65 | 6e 20 74 65 78 74 20 6f |s betwee|n text o|
|00000910| 72 20 6f 74 68 65 72 20 | 6d 65 64 69 61 20 74 79 |r other |media ty|
|00000920| 70 65 73 22 29 20 28 69 | 31 38 6e 20 2e 20 22 69 |pes") (i|18n . "i|
|00000930| 6e 74 65 72 6e 61 74 69 | 6f 6e 61 6c 69 7a 61 74 |nternati|onalizat|
|00000940| 69 6f 6e 20 61 6e 64 20 | 61 6c 74 65 72 6e 61 74 |ion and |alternat|
|00000950| 65 20 63 68 61 72 61 63 | 74 65 72 2d 73 65 74 20 |e charac|ter-set |
|00000960| 73 75 70 70 6f 72 74 22 | 29 20 28 69 6e 74 65 72 |support"|) (inter|
|00000970| 6e 61 6c 20 2e 20 22 63 | 6f 64 65 20 66 6f 72 20 |nal . "c|ode for |
|00000980| 45 6d 61 63 73 20 69 6e | 74 65 72 6e 61 6c 73 2c |Emacs in|ternals,|
|00000990| 20 62 75 69 6c 64 20 70 | 72 6f 63 65 73 73 2c 20 | build p|rocess, |
|000009a0| 64 65 66 61 75 6c 74 73 | 22 29 20 28 6c 61 6e 67 |defaults|") (lang|
|000009b0| 75 61 67 65 73 20 2e 20 | 22 73 70 65 63 69 61 6c |uages . |"special|
|000009c0| 69 7a 65 64 20 6d 6f 64 | 65 73 20 66 6f 72 20 65 |ized mod|es for e|
|000009d0| 64 69 74 69 6e 67 20 70 | 72 6f 67 72 61 6d 6d 69 |diting p|rogrammi|
|000009e0| 6e 67 20 6c 61 6e 67 75 | 61 67 65 73 22 29 20 28 |ng langu|ages") (|
|000009f0| 6c 69 73 70 20 2e 20 22 | 4c 69 73 70 20 73 75 70 |lisp . "|Lisp sup|
|00000a00| 70 6f 72 74 2c 20 69 6e | 63 6c 75 64 69 6e 67 20 |port, in|cluding |
|00000a10| 45 6d 61 63 73 20 4c 69 | 73 70 22 29 20 28 6c 6f |Emacs Li|sp") (lo|
|00000a20| 63 61 6c 20 2e 20 22 63 | 6f 64 65 20 6c 6f 63 61 |cal . "c|ode loca|
|00000a30| 6c 20 74 6f 20 79 6f 75 | 72 20 73 69 74 65 22 29 |l to you|r site")|
|00000a40| 20 28 6d 61 69 6e 74 20 | 2e 20 22 6d 61 69 6e 74 | (maint |. "maint|
|00000a50| 65 6e 61 6e 63 65 20 61 | 69 64 73 20 66 6f 72 20 |enance a|ids for |
|00000a60| 74 68 65 20 45 6d 61 63 | 73 20 64 65 76 65 6c 6f |the Emac|s develo|
|00000a70| 70 6d 65 6e 74 20 67 72 | 6f 75 70 22 29 20 28 6d |pment gr|oup") (m|
|00000a80| 61 69 6c 20 2e 20 22 6d | 6f 64 65 73 20 66 6f 72 |ail . "m|odes for|
|00000a90| 20 65 6c 65 63 74 72 6f | 6e 69 63 2d 6d 61 69 6c | electro|nic-mail|
|00000aa0| 20 68 61 6e 64 6c 69 6e | 67 22 29 20 28 6d 61 74 | handlin|g") (mat|
|00000ab0| 63 68 69 6e 67 20 2e 20 | 22 76 61 72 69 6f 75 73 |ching . |"various|
|00000ac0| 20 73 6f 72 74 73 20 6f | 66 20 73 65 61 72 63 68 | sorts o|f search|
|00000ad0| 69 6e 67 20 61 6e 64 20 | 6d 61 74 63 68 69 6e 67 |ing and |matching|
|00000ae0| 22 29 20 28 6d 6f 75 73 | 65 20 2e 20 22 6d 6f 75 |") (mous|e . "mou|
|00000af0| 73 65 20 73 75 70 70 6f | 72 74 22 29 20 66 65 61 |se suppo|rt") fea|
|00000b00| 74 75 72 65 70 20 6d 75 | 6c 65 20 22 6d 75 6c 74 |turep mu|le "mult|
|00000b10| 69 2d 6c 61 6e 67 75 61 | 67 65 20 65 78 74 65 6e |i-langua|ge exten|
|00000b20| 73 69 6f 6e 73 22 20 28 | 28 6e 65 77 73 20 2e 20 |sions" (|(news . |
|00000b30| 22 73 75 70 70 6f 72 74 | 20 66 6f 72 20 6e 65 74 |"support| for net|
|00000b40| 6e 65 77 73 20 72 65 61 | 64 69 6e 67 20 61 6e 64 |news rea|ding and|
|00000b50| 20 70 6f 73 74 69 6e 67 | 22 29 20 28 6f 6f 70 20 | posting|") (oop |
|00000b60| 2e 20 22 73 75 70 70 6f | 72 74 20 66 6f 72 20 6f |. "suppo|rt for o|
|00000b70| 62 6a 65 63 74 2d 6f 72 | 69 65 6e 74 65 64 20 70 |bject-or|iented p|
|00000b80| 72 6f 67 72 61 6d 6d 69 | 6e 67 22 29 20 28 6f 75 |rogrammi|ng") (ou|
|00000b90| 74 6c 69 6e 65 73 20 2e | 20 22 73 75 70 70 6f 72 |tlines .| "suppor|
|00000ba0| 74 20 66 6f 72 20 68 69 | 65 72 61 72 63 68 69 63 |t for hi|erarchic|
|00000bb0| 61 6c 20 6f 75 74 6c 69 | 6e 69 6e 67 22 29 20 28 |al outli|ning") (|
|00000bc0| 70 72 6f 63 65 73 73 65 | 73 20 2e 20 22 70 72 6f |processe|s . "pro|
|00000bd0| 63 65 73 73 2c 20 73 75 | 62 73 68 65 6c 6c 2c 20 |cess, su|bshell, |
|00000be0| 63 6f 6d 70 69 6c 61 74 | 69 6f 6e 2c 20 61 6e 64 |compilat|ion, and|
|00000bf0| 20 6a 6f 62 20 63 6f 6e | 74 72 6f 6c 20 73 75 70 | job con|trol sup|
|00000c00| 70 6f 72 74 22 29 20 28 | 74 65 72 6d 69 6e 61 6c |port") (|terminal|
|00000c10| 73 20 2e 20 22 73 75 70 | 70 6f 72 74 20 66 6f 72 |s . "sup|port for|
|00000c20| 20 74 65 72 6d 69 6e 61 | 6c 20 74 79 70 65 73 22 | termina|l types"|
|00000c30| 29 20 28 74 65 78 20 2e | 20 22 63 6f 64 65 20 72 |) (tex .| "code r|
|00000c40| 65 6c 61 74 65 64 20 74 | 6f 20 74 68 65 20 54 65 |elated t|o the Te|
|00000c50| 58 20 66 6f 72 6d 61 74 | 74 65 72 22 29 20 28 74 |X format|ter") (t|
|00000c60| 6f 6f 6c 73 20 2e 20 22 | 70 72 6f 67 72 61 6d 6d |ools . "|programm|
|00000c70| 69 6e 67 20 74 6f 6f 6c | 73 22 29 20 28 75 6e 69 |ing tool|s") (uni|
|00000c80| 78 20 2e 20 22 66 72 6f | 6e 74 2d 65 6e 64 73 2f |x . "fro|nt-ends/|
|00000c90| 61 73 73 69 73 74 61 6e | 74 73 20 66 6f 72 2c 20 |assistan|ts for, |
|00000ca0| 6f 72 20 65 6d 75 6c 61 | 74 6f 72 73 20 6f 66 2c |or emula|tors of,|
|00000cb0| 20 55 4e 49 58 20 66 65 | 61 74 75 72 65 73 22 29 | UNIX fe|atures")|
|00000cc0| 20 28 76 6d 73 20 2e 20 | 22 73 75 70 70 6f 72 74 | (vms . |"support|
|00000cd0| 20 63 6f 64 65 20 66 6f | 72 20 76 6d 73 22 29 20 | code fo|r vms") |
|00000ce0| 28 77 70 20 2e 20 22 77 | 6f 72 64 20 70 72 6f 63 |(wp . "w|ord proc|
|00000cf0| 65 73 73 69 6e 67 22 29 | 29 20 66 69 6e 64 65 72 |essing")|) finder|
|00000d00| 2d 6d 6f 64 65 2d 6d 61 | 70 20 6e 69 6c 20 6d 61 |-mode-ma|p nil ma|
|00000d10| 6b 65 2d 73 70 61 72 73 | 65 2d 6b 65 79 6d 61 70 |ke-spars|e-keymap|
|00000d20| 20 6d 61 70 20 64 65 66 | 69 6e 65 2d 6b 65 79 20 | map def|ine-key |
|00000d30| 22 20 22 20 66 69 6e 64 | 65 72 2d 73 65 6c 65 63 |" " find|er-selec|
|00000d40| 74 20 22 66 22 20 22 0d | 22 20 22 65 22 20 66 69 |t "f" ".|" "e" fi|
|00000d50| 6e 64 65 72 2d 65 64 69 | 74 20 22 76 22 20 66 69 |nder-edi|t "v" fi|
|00000d60| 6e 64 65 72 2d 76 69 65 | 77 20 22 3f 22 20 66 69 |nder-vie|w "?" fi|
|00000d70| 6e 64 65 72 2d 73 75 6d | 6d 61 72 79 20 22 71 22 |nder-sum|mary "q"|
|00000d80| 20 66 69 6e 64 65 72 2d | 65 78 69 74 20 22 64 22 | finder-|exit "d"|
|00000d90| 20 66 69 6e 64 65 72 2d | 6c 69 73 74 2d 6b 65 79 | finder-|list-key|
|00000da0| 77 6f 72 64 73 20 5b 62 | 75 74 74 6f 6e 32 5d 20 |words [b|utton2] |
|00000db0| 66 69 6e 64 65 72 2d 6d | 6f 75 73 65 2d 73 65 6c |finder-m|ouse-sel|
|00000dc0| 65 63 74 5d 20 32 36 29 | 0a 23 40 36 33 20 41 73 |ect] 26)|.#@63 As|
|00000dd0| 73 6f 63 20 6c 69 73 74 | 20 6d 61 70 70 69 6e 67 |soc list| mapping|
|00000de0| 20 66 69 6c 65 20 6e 61 | 6d 65 73 20 74 6f 20 64 | file na|mes to d|
|00000df0| 65 73 63 72 69 70 74 69 | 6f 6e 20 26 20 6b 65 79 |escripti|on & key|
|00000e00| 77 6f 72 64 20 6c 69 73 | 74 73 2e 1f 0a 28 64 65 |word lis|ts...(de|
|00000e10| 66 76 61 72 20 66 69 6e | 64 65 72 2d 70 61 63 6b |fvar fin|der-pack|
|00000e20| 61 67 65 2d 69 6e 66 6f | 20 6e 69 6c 20 28 23 24 |age-info| nil (#$|
|00000e30| 20 2e 20 33 35 33 34 29 | 29 0a 23 40 36 35 20 49 | . 3534)|).#@65 I|
|00000e40| 66 20 6e 6f 6e 2d 6e 69 | 6c 20 66 69 6e 64 65 72 |f non-ni|l finder|
|00000e50| 2d 63 6f 6d 70 69 6c 65 | 2d 6b 65 79 77 6f 72 64 |-compile|-keyword|
|00000e60| 73 20 77 69 6c 6c 20 6e | 6f 74 20 70 72 69 6e 74 |s will n|ot print|
|00000e70| 20 61 6e 79 20 6d 65 73 | 73 61 67 65 73 2e 1f 0a | any mes|sages...|
|00000e80| 28 64 65 66 76 61 72 20 | 66 69 6e 64 65 72 2d 63 |(defvar |finder-c|
|00000e90| 6f 6d 70 69 6c 65 2d 6b | 65 79 77 6f 72 64 73 2d |ompile-k|eywords-|
|00000ea0| 71 75 69 65 74 20 6e 69 | 6c 20 28 23 24 20 2e 20 |quiet ni|l (#$ . |
|00000eb0| 33 36 34 37 29 29 0a 23 | 40 31 38 36 20 52 65 67 |3647)).#|@186 Reg|
|00000ec0| 65 6e 65 72 61 74 65 20 | 74 68 65 20 6b 65 79 77 |enerate |the keyw|
|00000ed0| 6f 72 64 73 20 61 73 73 | 6f 63 69 61 74 69 6f 6e |ords ass|ociation|
|00000ee0| 20 6c 69 73 74 20 69 6e | 74 6f 20 74 68 65 20 66 | list in|to the f|
|00000ef0| 69 6c 65 20 60 66 69 6e | 64 65 72 2d 69 6e 66 2e |ile `fin|der-inf.|
|00000f00| 65 6c 27 2e 0a 4f 70 74 | 69 6f 6e 61 6c 20 61 72 |el'..Opt|ional ar|
|00000f10| 67 75 6d 65 6e 74 73 20 | 61 72 65 20 61 20 6c 69 |guments |are a li|
|00000f20| 73 74 20 6f 66 20 45 6d | 61 63 73 20 4c 69 73 70 |st of Em|acs Lisp|
|00000f30| 20 64 69 72 65 63 74 6f | 72 69 65 73 20 74 6f 20 | directo|ries to |
|00000f40| 63 6f 6d 70 69 6c 65 20 | 66 72 6f 6d 3b 20 6e 6f |compile |from; no|
|00000f50| 0a 61 72 67 75 6d 65 6e | 74 73 20 63 6f 6d 70 69 |.argumen|ts compi|
|00000f60| 6c 65 73 20 66 72 6f 6d | 20 60 6c 6f 61 64 2d 70 |les from| `load-p|
|00000f70| 61 74 68 27 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ath'...(|defalias|
|00000f80| 20 27 66 69 6e 64 65 72 | 2d 63 6f 6d 70 69 6c 65 | 'finder|-compile|
|00000f90| 2d 6b 65 79 77 6f 72 64 | 73 20 23 5b 28 26 72 65 |-keyword|s #[(&re|
|00000fa0| 73 74 20 64 69 72 73 29 | 20 22 8a c0 c1 21 88 c2 |st dirs)| "...!..|
|00000fb0| c3 c4 c5 0e 06 5c 22 0e | 07 5c 22 c2 1e 08 1e 07 |.....\".|.\".....|
|00000fc0| 1e 09 0e 5c 6e ac 84 0e | 0b 16 5c 6e 0e 5c 6e 0e |...\n...|..\n.\n.|
|00000fd0| 0b 6b 16 08 cc 20 88 cd | 63 88 ce 63 88 cf 63 88 |.k... ..|c..c..c.|
|00000fe0| d0 63 88 d1 63 88 d2 63 | 88 c4 d3 0e 5c 6e 5c 22 |.c..c..c|....\n\"|
|00000ff0| 88 d4 63 88 d5 d6 21 88 | d7 20 88 d8 20 2c 87 22 |..c...!.|. .. ,."|
|00001000| 20 5b 66 69 6e 64 2d 66 | 69 6c 65 20 22 66 69 6e | [find-f|ile "fin|
|00001010| 64 65 72 2d 69 6e 66 2e | 65 6c 22 20 6e 69 6c 20 |der-inf.|el" nil |
|00001020| 61 70 70 65 6e 64 20 6d | 61 70 63 61 72 20 23 5b |append m|apcar #[|
|00001030| 28 64 69 72 29 20 22 08 | c1 42 87 22 20 5b 64 69 |(dir) ".|.B." [di|
|00001040| 72 20 22 22 5d 20 32 5d | 20 66 69 6e 64 65 72 2d |r ""] 2]| finder-|
|00001050| 61 62 62 72 65 76 69 61 | 74 65 2d 64 69 72 65 63 |abbrevia|te-direc|
|00001060| 74 6f 72 79 2d 6c 69 73 | 74 20 64 69 72 65 63 74 |tory-lis|t direct|
|00001070| 6f 72 79 2d 61 62 62 72 | 65 76 2d 61 6c 69 73 74 |ory-abbr|ev-alist|
|00001080| 20 75 73 69 6e 67 2d 6c | 6f 61 64 2d 70 61 74 68 | using-l|oad-path|
|00001090| 20 70 72 6f 63 65 73 73 | 65 64 20 64 69 72 73 20 | process|ed dirs |
|000010a0| 6c 6f 61 64 2d 70 61 74 | 68 20 65 72 61 73 65 2d |load-pat|h erase-|
|000010b0| 62 75 66 66 65 72 20 22 | 3b 3b 3b 20 66 69 6e 64 |buffer "|;;; find|
|000010c0| 65 72 2d 69 6e 66 2e 65 | 6c 20 2d 2d 2d 20 6b 65 |er-inf.e|l --- ke|
|000010d0| 79 77 6f 72 64 2d 74 6f | 2d 70 61 63 6b 61 67 65 |yword-to|-package|
|000010e0| 20 6d 61 70 70 69 6e 67 | 5c 6e 22 20 22 3b 3b 20 | mapping|\n" ";; |
|000010f0| 4b 65 79 77 6f 72 64 73 | 3a 20 68 65 6c 70 5c 6e |Keywords|: help\n|
|00001100| 22 20 22 3b 3b 3b 20 43 | 6f 6d 6d 65 6e 74 61 72 |" ";;; C|ommentar|
|00001110| 79 3a 5c 6e 22 20 22 3b | 3b 20 44 6f 6e 27 74 20 |y:\n" ";|; Don't |
|00001120| 65 64 69 74 20 74 68 69 | 73 20 66 69 6c 65 2e 20 |edit thi|s file. |
|00001130| 20 49 74 27 73 20 67 65 | 6e 65 72 61 74 65 64 20 | It's ge|nerated |
|00001140| 62 79 20 66 69 6e 64 65 | 72 2e 65 6c 5c 6e 5c 6e |by finde|r.el\n\n|
|00001150| 22 20 22 3b 3b 3b 20 43 | 6f 64 65 3a 5c 6e 22 20 |" ";;; C|ode:\n" |
|00001160| 22 5c 6e 28 73 65 74 71 | 20 66 69 6e 64 65 72 2d |"\n(setq| finder-|
|00001170| 70 61 63 6b 61 67 65 2d | 69 6e 66 6f 20 27 28 5c |package-|info '(\|
|00001180| 6e 22 20 23 5b 28 64 29 | 20 22 c0 c1 5c 6e ad 8c |n" #[(d)| "..\n..|
|00001190| 0b ad 88 c4 0b 21 ad 83 | c5 0b 21 3f 3f ad 8c c6 |.....!..|..!??...|
|000011a0| 0b ae 81 c7 21 13 c8 0b | c9 ca 23 5c 22 87 22 20 |....!...|..#\"." |
|000011b0| 5b 6d 61 70 63 61 72 20 | 23 5b 28 66 29 20 22 08 |[mapcar |#[(f) ".|
|000011c0| 09 b6 3f ad e3 c2 89 89 | 1b 1c 1d 08 09 42 11 0e |..?.....|.....B..|
|000011d0| 06 ac 85 c7 c8 08 5c 22 | 88 8a c9 ca 21 71 88 cb |......\"|....!q..|
|000011e0| 70 21 88 cc 20 88 cd ce | 08 0e 0f 5c 22 21 88 d0 |p!.. ...|...\"!..|
|000011f0| 20 15 d1 20 13 29 0d ad | b0 d2 d3 08 5c 22 63 88 | .. .)..|....\"c.|
|00001200| d4 0d 70 5c 22 88 d5 63 | 88 60 14 0b ab 86 d2 d6 |..p\"..c|.`......|
|00001210| 0b 5c 22 aa 81 d7 63 88 | d8 0c 60 d9 da 24 88 d5 |.\"...c.|..`..$..|
|00001220| 63 88 d4 db 0e 0f 21 70 | 5c 22 88 dc 63 2b 87 22 |c.....!p|\"..c+."|
|00001230| 20 5b 66 20 70 72 6f 63 | 65 73 73 65 64 20 6e 69 | [f proc|essed ni|
|00001240| 6c 20 6b 65 79 77 6f 72 | 64 73 20 6b 65 79 73 74 |l keywor|ds keyst|
|00001250| 61 72 74 20 73 75 6d 6d | 61 72 79 20 66 69 6e 64 |art summ|ary find|
|00001260| 65 72 2d 63 6f 6d 70 69 | 6c 65 2d 6b 65 79 77 6f |er-compi|le-keywo|
|00001270| 72 64 73 2d 71 75 69 65 | 74 20 6d 65 73 73 61 67 |rds-quie|t messag|
|00001280| 65 20 22 50 72 6f 63 65 | 73 73 69 6e 67 20 25 73 |e "Proce|ssing %s|
|00001290| 20 2e 2e 2e 22 20 67 65 | 74 2d 62 75 66 66 65 72 | ..." ge|t-buffer|
|000012a0| 2d 63 72 65 61 74 65 20 | 22 2a 66 69 6e 64 65 72 |-create |"*finder|
|000012b0| 2d 73 63 72 61 74 63 68 | 2a 22 20 62 75 66 66 65 |-scratch|*" buffe|
|000012c0| 72 2d 64 69 73 61 62 6c | 65 2d 75 6e 64 6f 20 65 |r-disabl|e-undo e|
|000012d0| 72 61 73 65 2d 62 75 66 | 66 65 72 20 69 6e 73 65 |rase-buf|fer inse|
|000012e0| 72 74 2d 66 69 6c 65 2d | 63 6f 6e 74 65 6e 74 73 |rt-file-|contents|
|000012f0| 20 65 78 70 61 6e 64 2d | 66 69 6c 65 2d 6e 61 6d | expand-|file-nam|
|00001300| 65 20 64 20 6c 6d 2d 73 | 79 6e 6f 70 73 69 73 20 |e d lm-s|ynopsis |
|00001310| 6c 6d 2d 6b 65 79 77 6f | 72 64 73 20 66 6f 72 6d |lm-keywo|rds form|
|00001320| 61 74 20 22 20 20 20 20 | 28 5c 22 25 73 5c 22 5c |at "    |(\"%s\"\|
|00001330| 6e 20 20 20 20 20 20 20 | 20 22 20 70 72 69 6e 31 |n       | " prin1|
|00001340| 20 22 5c 6e 20 20 20 20 | 20 20 20 20 22 20 22 28 | "\n    |    " "(|
|00001350| 25 73 29 22 20 22 6e 69 | 6c 22 20 73 75 62 73 74 |%s)" "ni|l" subst|
|00001360| 2d 63 68 61 72 2d 69 6e | 2d 72 65 67 69 6f 6e 20 |-char-in|-region |
|00001370| 3f 5c 2c 20 3f 5c 20 20 | 61 62 62 72 65 76 69 61 |?\, ?\  |abbrevia|
|00001380| 74 65 2d 66 69 6c 65 2d | 6e 61 6d 65 20 22 29 5c |te-file-|name ")\|
|00001390| 6e 22 5d 20 35 5d 20 75 | 73 69 6e 67 2d 6c 6f 61 |n"] 5] u|sing-loa|
|000013a0| 64 2d 70 61 74 68 20 64 | 20 66 69 6c 65 2d 6e 61 |d-path d| file-na|
|000013b0| 6d 65 2d 61 62 73 6f 6c | 75 74 65 2d 70 20 66 69 |me-absol|ute-p fi|
|000013c0| 6c 65 2d 65 78 69 73 74 | 73 2d 70 20 66 69 6c 65 |le-exist|s-p file|
|000013d0| 2d 6e 61 6d 65 2d 61 73 | 2d 64 69 72 65 63 74 6f |-name-as|-directo|
|000013e0| 72 79 20 22 2e 22 20 64 | 69 72 65 63 74 6f 72 79 |ry "." d|irectory|
|000013f0| 2d 66 69 6c 65 73 20 6e | 69 6c 20 22 5e 5b 5e 3d |-files n|il "^[^=|
|00001400| 5d 2e 2a 5c 5c 2e 65 6c | 24 22 5d 20 36 5d 20 22 |].*\\.el|$"] 6] "|
|00001410| 29 29 5c 6e 5c 6e 28 70 | 72 6f 76 69 64 65 20 27 |))\n\n(p|rovide '|
|00001420| 66 69 6e 64 65 72 2d 69 | 6e 66 29 5c 6e 5c 6e 3b |finder-i|nf)\n\n;|
|00001430| 3b 3b 20 66 69 6e 64 65 | 72 2d 69 6e 66 2e 65 6c |;; finde|r-inf.el|
|00001440| 20 65 6e 64 73 20 68 65 | 72 65 5c 6e 22 20 6b 69 | ends he|re\n" ki|
|00001450| 6c 6c 2d 62 75 66 66 65 | 72 20 22 2a 66 69 6e 64 |ll-buffe|r "*find|
|00001460| 65 72 2d 73 63 72 61 74 | 63 68 2a 22 20 65 76 61 |er-scrat|ch*" eva|
|00001470| 6c 2d 63 75 72 72 65 6e | 74 2d 62 75 66 66 65 72 |l-curren|t-buffer|
|00001480| 20 62 61 73 69 63 2d 73 | 61 76 65 2d 62 75 66 66 | basic-s|ave-buff|
|00001490| 65 72 5d 20 35 20 28 23 | 24 20 2e 20 33 37 37 33 |er] 5 (#|$ . 3773|
|000014a0| 29 5d 29 0a 23 40 35 36 | 20 52 65 67 65 6e 65 72 |)]).#@56| Regener|
|000014b0| 61 74 65 20 60 66 69 6e | 64 65 72 2d 69 6e 66 2e |ate `fin|der-inf.|
|000014c0| 65 6c 27 20 66 6f 72 20 | 74 68 65 20 45 6d 61 63 |el' for |the Emac|
|000014d0| 73 20 64 69 73 74 72 69 | 62 75 74 69 6f 6e 2e 1f |s distri|bution..|
|000014e0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 66 69 6e 64 |.(defali|as 'find|
|000014f0| 65 72 2d 63 6f 6d 70 69 | 6c 65 2d 6b 65 79 77 6f |er-compi|le-keywo|
|00001500| 72 64 73 2d 6d 61 6b 65 | 2d 64 69 73 74 20 23 5b |rds-make|-dist #[|
|00001510| 6e 69 6c 20 22 c0 09 21 | 87 22 20 5b 66 69 6e 64 |nil "..!|." [find|
|00001520| 65 72 2d 63 6f 6d 70 69 | 6c 65 2d 6b 65 79 77 6f |er-compi|le-keywo|
|00001530| 72 64 73 20 64 65 66 61 | 75 6c 74 2d 64 69 72 65 |rds defa|ult-dire|
|00001540| 63 74 6f 72 79 5d 20 32 | 20 28 23 24 20 2e 20 35 |ctory] 2| (#$ . 5|
|00001550| 32 38 39 29 5d 29 0a 23 | 40 34 33 20 49 6e 73 65 |289)]).#|@43 Inse|
|00001560| 72 74 20 6c 69 73 74 20 | 6f 66 20 53 54 52 49 4e |rt list |of STRIN|
|00001570| 47 53 2c 20 61 74 20 63 | 6f 6c 75 6d 6e 20 43 4f |GS, at c|olumn CO|
|00001580| 4c 55 4d 4e 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |LUMN...(|defalias|
|00001590| 20 27 66 69 6e 64 65 72 | 2d 69 6e 73 65 72 74 2d | 'finder|-insert-|
|000015a0| 61 74 2d 63 6f 6c 75 6d | 6e 20 23 5b 28 63 6f 6c |at-colum|n #[(col|
|000015b0| 75 6d 6e 20 26 72 65 73 | 74 20 73 74 72 69 6e 67 |umn &res|t string|
|000015c0| 73 29 20 22 69 08 59 ab | 83 c1 63 88 c2 08 21 88 |s) "i.Y.|..c...!.|
|000015d0| 69 89 1b 08 57 ab 85 08 | 6a 88 aa 99 0b 08 55 ac |i...W...|j.....U.|
|000015e0| 94 68 c4 55 ab 8f c5 1e | 06 c7 c8 21 88 0b 6a 88 |.h.U....|...!..j.|
|000015f0| c2 08 21 88 29 29 c9 ca | 0e 0b 5c 22 87 22 20 5b |..!.))..|..\"." [|
|00001600| 63 6f 6c 75 6d 6e 20 22 | 5c 6e 22 20 6d 6f 76 65 |column "|\n" move|
|00001610| 2d 74 6f 2d 63 6f 6c 75 | 6d 6e 20 63 6f 6c 20 3f |-to-colu|mn col ?|
|00001620| 5c 74 20 6e 69 6c 20 69 | 6e 64 65 6e 74 2d 74 61 |\t nil i|ndent-ta|
|00001630| 62 73 2d 6d 6f 64 65 20 | 64 65 6c 65 74 65 2d 63 |bs-mode |delete-c|
|00001640| 68 61 72 20 2d 31 20 61 | 70 70 6c 79 20 69 6e 73 |har -1 a|pply ins|
|00001650| 65 72 74 20 73 74 72 69 | 6e 67 73 5d 20 34 20 28 |ert stri|ngs] 4 (|
|00001660| 23 24 20 2e 20 35 34 36 | 38 29 5d 29 0a 23 40 36 |#$ . 546|8)]).#@6|
|00001670| 30 20 44 69 73 70 6c 61 | 79 20 64 65 73 63 72 69 |0 Displa|y descri|
|00001680| 70 74 69 6f 6e 73 20 6f | 66 20 74 68 65 20 6b 65 |ptions o|f the ke|
|00001690| 79 77 6f 72 64 73 20 69 | 6e 20 74 68 65 20 46 69 |ywords i|n the Fi|
|000016a0| 6e 64 65 72 20 62 75 66 | 66 65 72 2e 1f 0a 28 64 |nder buf|fer...(d|
|000016b0| 65 66 61 6c 69 61 73 20 | 27 66 69 6e 64 65 72 2d |efalias |'finder-|
|000016c0| 6c 69 73 74 2d 6b 65 79 | 77 6f 72 64 73 20 23 5b |list-key|words #[|
|000016d0| 6e 69 6c 20 22 c0 11 c2 | 20 88 c3 c4 0d 5c 22 88 |nil "...| ....\".|
|000016e0| 65 62 88 60 16 06 c7 11 | c8 c0 21 88 c9 20 ac 83 |eb.`....|..!.. ..|
|000016f0| ca 20 88 cb 20 87 22 20 | 5b 6e 69 6c 20 62 75 66 |. .. ." |[nil buf|
|00001700| 66 65 72 2d 72 65 61 64 | 2d 6f 6e 6c 79 20 65 72 |fer-read|-only er|
|00001710| 61 73 65 2d 62 75 66 66 | 65 72 20 6d 61 70 63 61 |ase-buff|er mapca|
|00001720| 72 20 23 5b 28 61 73 73 | 6f 63 29 20 22 08 40 19 |r #[(ass|oc) ".@.|
|00001730| c2 09 21 63 88 c3 c4 08 | 41 c5 50 5c 22 88 c2 09 |..!c....|A.P\"...|
|00001740| 21 09 29 42 87 22 20 5b | 61 73 73 6f 63 20 6b 65 |!.)B." [|assoc ke|
|00001750| 79 77 6f 72 64 20 73 79 | 6d 62 6f 6c 2d 6e 61 6d |yword sy|mbol-nam|
|00001760| 65 20 66 69 6e 64 65 72 | 2d 69 6e 73 65 72 74 2d |e finder|-insert-|
|00001770| 61 74 2d 63 6f 6c 75 6d | 6e 20 31 34 20 22 5c 6e |at-colum|n 14 "\n|
|00001780| 22 5d 20 34 5d 20 66 69 | 6e 64 65 72 2d 6b 6e 6f |"] 4] fi|nder-kno|
|00001790| 77 6e 2d 6b 65 79 77 6f | 72 64 73 20 66 69 6e 64 |wn-keywo|rds find|
|000017a0| 65 72 2d 68 65 61 64 6d | 61 72 6b 20 74 20 73 65 |er-headm|ark t se|
|000017b0| 74 2d 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |t-buffer|-modifie|
|000017c0| 64 2d 70 20 6f 6e 65 2d | 77 69 6e 64 6f 77 2d 70 |d-p one-|window-p|
|000017d0| 20 62 61 6c 61 6e 63 65 | 2d 77 69 6e 64 6f 77 73 | balance|-windows|
|000017e0| 20 66 69 6e 64 65 72 2d | 73 75 6d 6d 61 72 79 5d | finder-|summary]|
|000017f0| 20 33 20 28 23 24 20 2e | 20 35 37 34 36 29 20 6e | 3 (#$ .| 5746) n|
|00001800| 69 6c 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |il]).(de|falias '|
|00001810| 66 69 6e 64 65 72 2d 6c | 69 73 74 2d 6d 61 74 63 |finder-l|ist-matc|
|00001820| 68 65 73 20 23 5b 28 6b | 65 79 29 20 22 c0 11 c2 |hes #[(k|ey) "...|
|00001830| 20 88 c3 0c 21 1d c6 0c | c7 b1 03 88 60 16 08 c9 | ...!...|....`...|
|00001840| ca 0e 0b 5c 22 88 65 62 | 88 c0 79 88 cc 11 cd c0 |...\".eb|..y.....|
|00001850| 21 88 ce 20 88 cf 20 29 | 87 22 20 5b 6e 69 6c 20 |!.. .. )|." [nil |
|00001860| 62 75 66 66 65 72 2d 72 | 65 61 64 2d 6f 6e 6c 79 |buffer-r|ead-only|
|00001870| 20 65 72 61 73 65 2d 62 | 75 66 66 65 72 20 69 6e | erase-b|uffer in|
|00001880| 74 65 72 6e 20 6b 65 79 | 20 69 64 20 22 54 68 65 |tern key| id "The|
|00001890| 20 66 6f 6c 6c 6f 77 69 | 6e 67 20 70 61 63 6b 61 | followi|ng packa|
|000018a0| 67 65 73 20 6d 61 74 63 | 68 20 74 68 65 20 6b 65 |ges matc|h the ke|
|000018b0| 79 77 6f 72 64 20 60 22 | 20 22 27 3a 5c 6e 5c 6e |yword `"| "':\n\n|
|000018c0| 22 20 66 69 6e 64 65 72 | 2d 68 65 61 64 6d 61 72 |" finder|-headmar|
|000018d0| 6b 20 6d 61 70 63 61 72 | 20 23 5b 28 78 29 20 22 |k mapcar| #[(x) "|
|000018e0| 08 09 41 41 40 73 ad 8c | 09 40 63 88 c2 c3 09 41 |..AA@s..|.@c....A|
|000018f0| 40 c4 50 5c 22 87 22 20 | 5b 69 64 20 78 20 66 69 |@.P\"." |[id x fi|
|00001900| 6e 64 65 72 2d 69 6e 73 | 65 72 74 2d 61 74 2d 63 |nder-ins|ert-at-c|
|00001910| 6f 6c 75 6d 6e 20 31 36 | 20 22 5c 6e 22 5d 20 34 |olumn 16| "\n"] 4|
|00001920| 5d 20 66 69 6e 64 65 72 | 2d 70 61 63 6b 61 67 65 |] finder|-package|
|00001930| 2d 69 6e 66 6f 20 74 20 | 73 65 74 2d 62 75 66 66 |-info t |set-buff|
|00001940| 65 72 2d 6d 6f 64 69 66 | 69 65 64 2d 70 20 73 68 |er-modif|ied-p sh|
|00001950| 72 69 6e 6b 2d 77 69 6e | 64 6f 77 2d 69 66 2d 6c |rink-win|dow-if-l|
|00001960| 61 72 67 65 72 2d 74 68 | 61 6e 2d 62 75 66 66 65 |arger-th|an-buffe|
|00001970| 72 20 66 69 6e 64 65 72 | 2d 73 75 6d 6d 61 72 79 |r finder|-summary|
|00001980| 5d 20 33 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 3]).(d|efalias |
|00001990| 27 66 69 6e 64 65 72 2d | 66 69 6e 64 2d 6c 69 62 |'finder-|find-lib|
|000019a0| 72 61 72 79 20 23 5b 28 | 66 69 6c 65 29 20 22 c0 |rary #[(|file) ".|
|000019b0| 09 21 ab 82 09 87 5c 6e | c3 1c 89 1d ab ab 0c ac |.!....\n|........|
|000019c0| a8 c6 c7 09 c8 50 0d 40 | 5c 22 21 ab 88 c7 09 0d |.....P.@|\"!.....|
|000019d0| 40 5c 22 14 aa 8f c6 c7 | 09 0d 40 5c 22 21 ab 86 |@\".....|..@\"!..|
|000019e0| c7 09 0d 40 5c 22 14 0d | 41 89 15 ac 55 0c 2a 87 |...@\"..|A...U.*.|
|000019f0| 22 20 5b 66 69 6c 65 2d | 6e 61 6d 65 2d 61 62 73 |" [file-|name-abs|
|00001a00| 6f 6c 75 74 65 2d 70 20 | 66 69 6c 65 20 6c 6f 61 |olute-p |file loa|
|00001a10| 64 2d 70 61 74 68 20 6e | 69 6c 20 66 6f 75 6e 64 |d-path n|il found|
|00001a20| 20 64 69 72 73 20 66 69 | 6c 65 2d 65 78 69 73 74 | dirs fi|le-exist|
|00001a30| 73 2d 70 20 65 78 70 61 | 6e 64 2d 66 69 6c 65 2d |s-p expa|nd-file-|
|00001a40| 6e 61 6d 65 20 22 2e 65 | 6c 22 5d 20 35 5d 29 0a |name ".e|l"] 5]).|
|00001a50| 28 64 65 66 61 6c 69 61 | 73 20 27 66 69 6e 64 65 |(defalia|s 'finde|
|00001a60| 72 2d 63 6f 6d 6d 65 6e | 74 61 72 79 20 23 5b 28 |r-commen|tary #[(|
|00001a70| 66 69 6c 65 29 20 22 c0 | c1 5c 6e 21 21 89 1b ac |file) ".|.\n!!...|
|00001a80| 84 c4 c5 21 88 c6 c7 21 | 88 c8 16 09 ca 16 0b cc |...!...!|........|
|00001a90| 20 88 0b 63 88 65 62 88 | cd 20 88 64 62 88 cd 20 | ..c.eb.|. .db.. |
|00001aa0| 88 65 62 88 ce cf c8 d0 | 23 ab 88 d1 d2 c8 89 23 |.eb.....|#......#|
|00001ab0| 88 aa 71 65 62 88 d0 16 | 09 d3 c8 21 88 d4 20 88 |..qeb...|...!.. .|
|00001ac0| d5 20 29 87 22 20 5b 6c | 6d 2d 63 6f 6d 6d 65 6e |. )." [l|m-commen|
|00001ad0| 74 61 72 79 20 66 69 6e | 64 65 72 2d 66 69 6e 64 |tary fin|der-find|
|00001ae0| 2d 6c 69 62 72 61 72 79 | 20 66 69 6c 65 20 73 74 |-library| file st|
|00001af0| 72 20 65 72 72 6f 72 20 | 22 43 61 6e 27 74 20 66 |r error |"Can't f|
|00001b00| 69 6e 64 20 61 6e 79 20 | 43 6f 6d 6d 65 6e 74 61 |ind any |Commenta|
|00001b10| 72 79 20 73 65 63 74 69 | 6f 6e 22 20 70 6f 70 2d |ry secti|on" pop-|
|00001b20| 74 6f 2d 62 75 66 66 65 | 72 20 22 2a 46 69 6e 64 |to-buffe|r "*Find|
|00001b30| 65 72 2a 22 20 6e 69 6c | 20 62 75 66 66 65 72 2d |er*" nil| buffer-|
|00001b40| 72 65 61 64 2d 6f 6e 6c | 79 20 6d 6f 64 65 2d 6d |read-onl|y mode-m|
|00001b50| 6f 74 69 6f 6e 2d 68 69 | 67 68 6c 69 67 68 74 2d |otion-hi|ghlight-|
|00001b60| 6c 69 6e 65 20 6d 6f 64 | 65 2d 6d 6f 74 69 6f 6e |line mod|e-motion|
|00001b70| 2d 68 6f 6f 6b 20 65 72 | 61 73 65 2d 62 75 66 66 |-hook er|ase-buff|
|00001b80| 65 72 20 64 65 6c 65 74 | 65 2d 62 6c 61 6e 6b 2d |er delet|e-blank-|
|00001b90| 6c 69 6e 65 73 20 72 65 | 2d 73 65 61 72 63 68 2d |lines re|-search-|
|00001ba0| 66 6f 72 77 61 72 64 20 | 22 5e 3b 2b 20 3f 22 20 |forward |"^;+ ?" |
|00001bb0| 74 20 72 65 70 6c 61 63 | 65 2d 6d 61 74 63 68 20 |t replac|e-match |
|00001bc0| 22 22 20 73 65 74 2d 62 | 75 66 66 65 72 2d 6d 6f |"" set-b|uffer-mo|
|00001bd0| 64 69 66 69 65 64 2d 70 | 20 73 68 72 69 6e 6b 2d |dified-p| shrink-|
|00001be0| 77 69 6e 64 6f 77 2d 69 | 66 2d 6c 61 72 67 65 72 |window-i|f-larger|
|00001bf0| 2d 74 68 61 6e 2d 62 75 | 66 66 65 72 20 66 69 6e |-than-bu|ffer fin|
|00001c00| 64 65 72 2d 73 75 6d 6d | 61 72 79 5d 20 35 20 6e |der-summ|ary] 5 n|
|00001c10| 69 6c 20 6e 69 6c 5d 29 | 0a 28 64 65 66 61 6c 69 |il nil])|.(defali|
|00001c20| 61 73 20 27 66 69 6e 64 | 65 72 2d 63 75 72 72 65 |as 'find|er-curre|
|00001c30| 6e 74 2d 69 74 65 6d 20 | 23 5b 6e 69 6c 20 22 08 |nt-item |#[nil ".|
|00001c40| ab 89 60 08 57 ab 84 c1 | c2 21 87 8a c3 79 88 c4 |..`.W...|.!...y..|
|00001c50| 20 29 87 22 20 5b 66 69 | 6e 64 65 72 2d 68 65 61 | )." [fi|nder-hea|
|00001c60| 64 6d 61 72 6b 20 65 72 | 72 6f 72 20 22 4e 6f 20 |dmark er|ror "No |
|00001c70| 6b 65 79 77 6f 72 64 20 | 6f 72 20 66 69 6c 65 6e |keyword |or filen|
|00001c80| 61 6d 65 20 6f 6e 20 74 | 68 69 73 20 6c 69 6e 65 |ame on t|his line|
|00001c90| 22 20 30 20 63 75 72 72 | 65 6e 74 2d 77 6f 72 64 |" 0 curr|ent-word|
|00001ca0| 5d 20 32 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 2]).(d|efalias |
|00001cb0| 27 66 69 6e 64 65 72 2d | 65 64 69 74 20 23 5b 6e |'finder-|edit #[n|
|00001cc0| 69 6c 20 22 c0 20 19 c2 | 0b 09 5c 22 ab 93 c4 09 |il ". ..|..\"....|
|00001cd0| 21 89 1d ab 85 c6 0d 21 | aa 84 c7 c8 09 5c 22 29 |!......!|.....\")|
|00001ce0| aa 83 c7 c9 21 29 87 22 | 20 5b 66 69 6e 64 65 72 |....!)."| [finder|
|00001cf0| 2d 63 75 72 72 65 6e 74 | 2d 69 74 65 6d 20 65 6e |-current|-item en|
|00001d00| 74 72 79 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |try stri|ng-match|
|00001d10| 20 66 69 6e 64 65 72 2d | 66 69 6c 65 2d 72 65 67 | finder-|file-reg|
|00001d20| 65 78 70 20 66 69 6e 64 | 65 72 2d 66 69 6e 64 2d |exp find|er-find-|
|00001d30| 6c 69 62 72 61 72 79 20 | 70 61 74 68 20 66 69 6e |library |path fin|
|00001d40| 64 2d 66 69 6c 65 2d 6f | 74 68 65 72 2d 77 69 6e |d-file-o|ther-win|
|00001d50| 64 6f 77 20 65 72 72 6f | 72 20 22 43 61 6e 27 74 |dow erro|r "Can't|
|00001d60| 20 66 69 6e 64 20 45 6d | 61 63 73 20 4c 69 73 70 | find Em|acs Lisp|
|00001d70| 20 6c 69 62 72 61 72 79 | 3a 20 27 25 73 27 22 20 | library|: '%s'" |
|00001d80| 22 46 69 6e 64 65 72 2d | 65 64 69 74 20 77 6f 72 |"Finder-|edit wor|
|00001d90| 6b 73 20 6f 6e 20 45 6d | 61 63 73 20 4c 69 73 70 |ks on Em|acs Lisp|
|00001da0| 20 6c 69 62 72 61 72 69 | 65 73 20 6f 6e 6c 79 22 | librari|es only"|
|00001db0| 5d 20 34 20 6e 69 6c 20 | 6e 69 6c 5d 29 0a 28 64 |] 4 nil |nil]).(d|
|00001dc0| 65 66 61 6c 69 61 73 20 | 27 66 69 6e 64 65 72 2d |efalias |'finder-|
|00001dd0| 76 69 65 77 20 23 5b 6e | 69 6c 20 22 c0 20 19 c2 |view #[n|il ". ..|
|00001de0| 0b 09 5c 22 ab 93 c4 09 | 21 89 1d ab 85 c6 0d 21 |..\"....|!......!|
|00001df0| aa 84 c7 c8 09 5c 22 29 | aa 83 c7 c9 21 29 87 22 |.....\")|....!)."|
|00001e00| 20 5b 66 69 6e 64 65 72 | 2d 63 75 72 72 65 6e 74 | [finder|-current|
|00001e10| 2d 69 74 65 6d 20 65 6e | 74 72 79 20 73 74 72 69 |-item en|try stri|
|00001e20| 6e 67 2d 6d 61 74 63 68 | 20 66 69 6e 64 65 72 2d |ng-match| finder-|
|00001e30| 66 69 6c 65 2d 72 65 67 | 65 78 70 20 66 69 6e 64 |file-reg|exp find|
|00001e40| 65 72 2d 66 69 6e 64 2d | 6c 69 62 72 61 72 79 20 |er-find-|library |
|00001e50| 70 61 74 68 20 76 69 65 | 77 2d 66 69 6c 65 2d 6f |path vie|w-file-o|
|00001e60| 74 68 65 72 2d 77 69 6e | 64 6f 77 20 65 72 72 6f |ther-win|dow erro|
|00001e70| 72 20 22 43 61 6e 27 74 | 20 66 69 6e 64 20 45 6d |r "Can't| find Em|
|00001e80| 61 63 73 20 4c 69 73 70 | 20 6c 69 62 72 61 72 79 |acs Lisp| library|
|00001e90| 3a 20 27 25 73 27 22 20 | 22 46 69 6e 64 65 72 2d |: '%s'" |"Finder-|
|00001ea0| 76 69 65 77 20 77 6f 72 | 6b 73 20 6f 6e 20 45 6d |view wor|ks on Em|
|00001eb0| 61 63 73 20 4c 69 73 70 | 20 6c 69 62 72 61 72 69 |acs Lisp| librari|
|00001ec0| 65 73 20 6f 6e 6c 79 22 | 5d 20 34 20 6e 69 6c 20 |es only"|] 4 nil |
|00001ed0| 6e 69 6c 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |nil]).(d|efalias |
|00001ee0| 27 66 69 6e 64 65 72 2d | 73 65 6c 65 63 74 20 23 |'finder-|select #|
|00001ef0| 5b 6e 69 6c 20 22 c0 20 | 19 c2 0b 09 5c 22 ab 85 |[nil ". |....\"..|
|00001f00| c4 09 21 aa 83 c5 09 21 | 29 87 22 20 5b 66 69 6e |..!....!|)." [fin|
|00001f10| 64 65 72 2d 63 75 72 72 | 65 6e 74 2d 69 74 65 6d |der-curr|ent-item|
|00001f20| 20 6b 65 79 20 73 74 72 | 69 6e 67 2d 6d 61 74 63 | key str|ing-matc|
|00001f30| 68 20 66 69 6e 64 65 72 | 2d 66 69 6c 65 2d 72 65 |h finder|-file-re|
|00001f40| 67 65 78 70 20 66 69 6e | 64 65 72 2d 63 6f 6d 6d |gexp fin|der-comm|
|00001f50| 65 6e 74 61 72 79 20 66 | 69 6e 64 65 72 2d 6c 69 |entary f|inder-li|
|00001f60| 73 74 2d 6d 61 74 63 68 | 65 73 5d 20 33 20 6e 69 |st-match|es] 3 ni|
|00001f70| 6c 20 6e 69 6c 5d 29 0a | 28 64 65 66 61 6c 69 61 |l nil]).|(defalia|
|00001f80| 73 20 27 66 69 6e 64 65 | 72 2d 6d 6f 75 73 65 2d |s 'finde|r-mouse-|
|00001f90| 73 65 6c 65 63 74 20 23 | 5b 28 65 76 29 20 22 c0 |select #|[(ev) ".|
|00001fa0| 09 21 62 88 c2 20 87 22 | 20 5b 65 76 65 6e 74 2d |.!b.. ."| [event-|
|00001fb0| 70 6f 69 6e 74 20 65 76 | 20 66 69 6e 64 65 72 2d |point ev| finder-|
|00001fc0| 73 65 6c 65 63 74 5d 20 | 32 20 6e 69 6c 20 22 65 |select] |2 nil "e|
|00001fd0| 22 5d 29 0a 23 40 34 31 | 20 46 69 6e 64 20 70 61 |"]).#@41| Find pa|
|00001fe0| 63 6b 61 67 65 73 20 6d | 61 74 63 68 69 6e 67 20 |ckages m|atching |
|00001ff0| 61 20 67 69 76 65 6e 20 | 6b 65 79 77 6f 72 64 2e |a given |keyword.|
|00002000| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 66 69 6e |..(defal|ias 'fin|
|00002010| 64 65 72 2d 62 79 2d 6b | 65 79 77 6f 72 64 20 23 |der-by-k|eyword #|
|00002020| 5b 6e 69 6c 20 22 c0 20 | 88 c1 20 87 22 20 5b 66 |[nil ". |.. ." [f|
|00002030| 69 6e 64 65 72 2d 6d 6f | 64 65 20 66 69 6e 64 65 |inder-mo|de finde|
|00002040| 72 2d 6c 69 73 74 2d 6b | 65 79 77 6f 72 64 73 5d |r-list-k|eywords]|
|00002050| 20 31 20 28 23 24 20 2e | 20 38 31 35 33 29 20 6e | 1 (#$ .| 8153) n|
|00002060| 69 6c 5d 29 0a 23 40 32 | 39 30 20 4d 61 6a 6f 72 |il]).#@2|90 Major|
|00002070| 20 6d 6f 64 65 20 66 6f | 72 20 62 72 6f 77 73 69 | mode fo|r browsi|
|00002080| 6e 67 20 70 61 63 6b 61 | 67 65 20 64 6f 63 75 6d |ng packa|ge docum|
|00002090| 65 6e 74 61 74 69 6f 6e | 2e 0a 5c 3c 66 69 6e 64 |entation|..\<find|
|000020a0| 65 72 2d 6d 6f 64 65 2d | 6d 61 70 3e 0a 5c 5b 66 |er-mode-|map>.\[f|
|000020b0| 69 6e 64 65 72 2d 73 65 | 6c 65 63 74 5d 09 6d 6f |inder-se|lect].mo|
|000020c0| 72 65 20 68 65 6c 70 20 | 66 6f 72 20 74 68 65 20 |re help |for the |
|000020d0| 69 74 65 6d 20 6f 6e 20 | 74 68 65 20 63 75 72 72 |item on |the curr|
|000020e0| 65 6e 74 20 6c 69 6e 65 | 0a 5c 5b 66 69 6e 64 65 |ent line|.\[finde|
|000020f0| 72 2d 65 64 69 74 5d 20 | 65 64 69 74 20 4c 69 73 |r-edit] |edit Lis|
|00002100| 70 20 6c 69 62 72 61 72 | 79 20 69 6e 20 61 6e 6f |p librar|y in ano|
|00002110| 74 68 65 72 20 77 69 6e | 64 6f 77 0a 5c 5b 66 69 |ther win|dow.\[fi|
|00002120| 6e 64 65 72 2d 76 69 65 | 77 5d 20 76 69 65 77 20 |nder-vie|w] view |
|00002130| 4c 69 73 70 20 6c 69 62 | 72 61 72 79 20 69 6e 20 |Lisp lib|rary in |
|00002140| 61 6e 6f 74 68 65 72 20 | 77 69 6e 64 6f 77 0a 5c |another |window.\|
|00002150| 5b 66 69 6e 64 65 72 2d | 65 78 69 74 5d 09 65 78 |[finder-|exit].ex|
|00002160| 69 74 20 46 69 6e 64 65 | 72 20 6d 6f 64 65 20 61 |it Finde|r mode a|
|00002170| 6e 64 20 6b 69 6c 6c 20 | 74 68 65 20 46 69 6e 64 |nd kill |the Find|
|00002180| 65 72 20 62 75 66 66 65 | 72 2e 0a 1f 0a 28 64 65 |er buffe|r....(de|
|00002190| 66 61 6c 69 61 73 20 27 | 66 69 6e 64 65 72 2d 6d |falias '|finder-m|
|000021a0| 6f 64 65 20 23 5b 6e 69 | 6c 20 22 c0 c1 21 88 c2 |ode #[ni|l "..!..|
|000021b0| 13 c4 15 c6 20 88 c7 0e | 08 21 88 c9 0e 5c 6e 21 |.... ...|.!...\n!|
|000021c0| 88 cb 16 0c cd 16 0e cf | d0 21 88 c2 89 16 10 87 |........|.!......|
|000021d0| 22 20 5b 70 6f 70 2d 74 | 6f 2d 62 75 66 66 65 72 |" [pop-t|o-buffer|
|000021e0| 20 22 2a 46 69 6e 64 65 | 72 2a 22 20 6e 69 6c 20 | "*Finde|r*" nil |
|000021f0| 62 75 66 66 65 72 2d 72 | 65 61 64 2d 6f 6e 6c 79 |buffer-r|ead-only|
|00002200| 20 6d 6f 64 65 2d 6d 6f | 74 69 6f 6e 2d 68 69 67 | mode-mo|tion-hig|
|00002210| 68 6c 69 67 68 74 2d 6c | 69 6e 65 20 6d 6f 64 65 |hlight-l|ine mode|
|00002220| 2d 6d 6f 74 69 6f 6e 2d | 68 6f 6f 6b 20 65 72 61 |-motion-|hook era|
|00002230| 73 65 2d 62 75 66 66 65 | 72 20 75 73 65 2d 6c 6f |se-buffe|r use-lo|
|00002240| 63 61 6c 2d 6d 61 70 20 | 66 69 6e 64 65 72 2d 6d |cal-map |finder-m|
|00002250| 6f 64 65 2d 6d 61 70 20 | 73 65 74 2d 73 79 6e 74 |ode-map |set-synt|
|00002260| 61 78 2d 74 61 62 6c 65 | 20 65 6d 61 63 73 2d 6c |ax-table| emacs-l|
|00002270| 69 73 70 2d 6d 6f 64 65 | 2d 73 79 6e 74 61 78 2d |isp-mode|-syntax-|
|00002280| 74 61 62 6c 65 20 22 46 | 69 6e 64 65 72 22 20 6d |table "F|inder" m|
|00002290| 6f 64 65 2d 6e 61 6d 65 | 20 66 69 6e 64 65 72 2d |ode-name| finder-|
|000022a0| 6d 6f 64 65 20 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |mode maj|or-mode |
|000022b0| 6d 61 6b 65 2d 6c 6f 63 | 61 6c 2d 76 61 72 69 61 |make-loc|al-varia|
|000022c0| 62 6c 65 20 66 69 6e 64 | 65 72 2d 68 65 61 64 6d |ble find|er-headm|
|000022d0| 61 72 6b 5d 20 32 20 28 | 23 24 20 2e 20 38 32 39 |ark] 2 (|#$ . 829|
|000022e0| 39 29 20 6e 69 6c 5d 29 | 0a 23 40 33 34 20 53 75 |9) nil])|.#@34 Su|
|000022f0| 6d 6d 61 72 69 7a 65 20 | 62 61 73 69 63 20 46 69 |mmarize |basic Fi|
|00002300| 6e 64 65 72 20 63 6f 6d | 6d 61 6e 64 73 2e 1f 0a |nder com|mands...|
|00002310| 28 64 65 66 61 6c 69 61 | 73 20 27 66 69 6e 64 65 |(defalia|s 'finde|
|00002320| 72 2d 73 75 6d 6d 61 72 | 79 20 23 5b 6e 69 6c 20 |r-summar|y #[nil |
|00002330| 22 c0 c1 c2 c3 21 5c 22 | 87 22 20 5b 6d 65 73 73 |"....!\"|." [mess|
|00002340| 61 67 65 20 22 25 73 22 | 20 73 75 62 73 74 69 74 |age "%s"| substit|
|00002350| 75 74 65 2d 63 6f 6d 6d | 61 6e 64 2d 6b 65 79 73 |ute-comm|and-keys|
|00002360| 20 22 5c 5c 3c 66 69 6e | 64 65 72 2d 6d 6f 64 65 | "\\<fin|der-mode|
|00002370| 2d 6d 61 70 3e 5c 5c 5b | 66 69 6e 64 65 72 2d 73 |-map>\\[|finder-s|
|00002380| 65 6c 65 63 74 5d 20 3d | 20 73 65 6c 65 63 74 2c |elect] =| select,|
|00002390| 20 5c 5c 5b 66 69 6e 64 | 65 72 2d 6c 69 73 74 2d | \\[find|er-list-|
|000023a0| 6b 65 79 77 6f 72 64 73 | 5d 20 3d 20 6b 65 79 77 |keywords|] = keyw|
|000023b0| 6f 72 64 73 2c 20 5c 5c | 5b 66 69 6e 64 65 72 2d |ords, \\|[finder-|
|000023c0| 65 64 69 74 5d 20 3d 20 | 65 64 69 74 2c 20 5c 5c |edit] = |edit, \\|
|000023d0| 5b 66 69 6e 64 65 72 2d | 76 69 65 77 5d 20 3d 20 |[finder-|view] = |
|000023e0| 76 69 65 77 2c 20 5c 5c | 5b 66 69 6e 64 65 72 2d |view, \\|[finder-|
|000023f0| 65 78 69 74 5d 20 3d 20 | 71 75 69 74 2c 20 5c 5c |exit] = |quit, \\|
|00002400| 5b 66 69 6e 64 65 72 2d | 73 75 6d 6d 61 72 79 5d |[finder-|summary]|
|00002410| 20 3d 20 68 65 6c 70 22 | 5d 20 34 20 28 23 24 20 | = help"|] 4 (#$ |
|00002420| 2e 20 38 39 34 32 29 20 | 6e 69 6c 5d 29 0a 23 40 |. 8942) |nil]).#@|
|00002430| 33 38 20 45 78 69 74 20 | 46 69 6e 64 65 72 20 6d |38 Exit |Finder m|
|00002440| 6f 64 65 20 61 6e 64 20 | 6b 69 6c 6c 20 74 68 65 |ode and |kill the|
|00002450| 20 62 75 66 66 65 72 1f | 0a 28 64 65 66 61 6c 69 | buffer.|.(defali|
|00002460| 61 73 20 27 66 69 6e 64 | 65 72 2d 65 78 69 74 20 |as 'find|er-exit |
|00002470| 23 5b 6e 69 6c 20 22 c0 | c1 c2 5c 22 ac 83 c3 20 |#[nil ".|..\"... |
|00002480| 88 c4 c5 21 87 22 20 5b | 6f 6e 65 2d 77 69 6e 64 |...!." [|one-wind|
|00002490| 6f 77 2d 70 20 74 20 30 | 20 64 65 6c 65 74 65 2d |ow-p t 0| delete-|
|000024a0| 77 69 6e 64 6f 77 20 6b | 69 6c 6c 2d 62 75 66 66 |window k|ill-buff|
|000024b0| 65 72 20 22 2a 46 69 6e | 64 65 72 2a 22 5d 20 33 |er "*Fin|der*"] 3|
|000024c0| 20 28 23 24 20 2e 20 39 | 32 36 37 29 20 6e 69 6c | (#$ . 9|267) nil|
|000024d0| 5d 29 0a 28 70 72 6f 76 | 69 64 65 20 27 66 69 6e |]).(prov|ide 'fin|
|000024e0| 64 65 72 29 0a          |                         |der).   |        |
+--------+-------------------------+-------------------------+--------+--------+